home *** CD-ROM | disk | FTP | other *** search
/ F1 Licenseware / F1 Licenseware - Volume 1.iso / disks / 028.dms / 028.adf / pics / ©M.RICHMOND / ©M.amosSourceCode
AMOS Source Code  |  1992-02-26  |  46b  |  4 lines
  1. Unpack 7 To 0
  2. Do 
  3.    Exit If Mouse Key<>0
  4. Loop